home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / progrmng / exmpldrw.sit / For THINK Pascal 3.0 / SpecialUnits / UShapeViewHelperImpl.p < prev   
Encoding:
Text File  |  1990-06-19  |  934 b   |  44 lines  |  [TEXT/PJMM]
  1. (*
  2.  
  3.     Copyright ⌐ 1989-1990 Larry S. Rosenstein.  All rights reserved.
  4.     You may use this source code in your own Macintosh programs,
  5.     but you may not redistribute or sell it.
  6.  
  7. *)
  8.  
  9. UNIT UShapeViewHelperImpl;
  10.  
  11.     { This unit defines the TShapeViewHelper class, which is the heart of the graphics
  12.         building block.  TShapeViewHelper implements the standard behavior of the building 
  13.         block; that is, how all the pieces work together. 
  14.         
  15.       You should call the following methods from the corresponding ones in TShapeView:
  16.             CalcMinSize
  17.             ContainsClipType
  18.             DoHighlightSelection
  19.             DoMenuCommand
  20.             DoMouseCommand
  21.             DoSetupMenus
  22.             Draw
  23.             GivePasteData
  24.             WriteToDeskScrap
  25.             
  26.         See the implementation of TShapeView for details.
  27.       }
  28.             
  29.             
  30. INTERFACE
  31.  
  32. USES
  33.         Errors,
  34.         UMacApp,
  35.         UStream, UQuickDrawPattern, UShape,
  36.         UShapeList, UShapeFilters, UShapeCommands, UShapeViewHelper;
  37.         
  38.  
  39. IMPLEMENTATION
  40.  
  41. {$I UShapeViewHelper.inc1.p}
  42.  
  43. END.
  44.